(mouse-set-region):

Test for ms-windows instead of win32, and use memq.

diff --git a/lisp/mouse.el b/lisp/mouse.el
index c7f333c8332ac6a85c5915628810b0f6ec253dd4..8da7095bada2903372f241785fdb7f0ddcbfb6c5 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -401,9 +401,7 @@ This should be bound to a mouse drag event."
     ;; If mark is highlighted, no need to bounce the cursor.
     ;; On X, we highlight while dragging, thus once again no need to bounce.
     (or transient-mark-mode
-       (eq (framep (selected-frame)) 'x)
-       (eq (framep (selected-frame)) 'pc)
-       (eq (framep (selected-frame)) 'win32)
+       (memq (framep (selected-frame)) '(x pc ms-windows))
        (sit-for 1))
     (push-mark)
     (set-mark (point))